Public Class ELicencia

    Dim mtitulo As String
    Public Property Titulo() As String
        Get
            Return mtitulo
        End Get
        Set(ByVal value As String)
            mtitulo = value
        End Set
    End Property

    Dim mcapitulo As String
    Public Property Capitulo() As String
        Get
            Return mcapitulo
        End Get
        Set(ByVal value As String)
            mcapitulo = value
        End Set
    End Property

    Dim marticulo As Integer
    Public Property Articulo() As Integer
        Get
            Return marticulo
        End Get
        Set(ByVal value As Integer)
            marticulo = value
        End Set
    End Property

    Dim mlicencia As String
    Public Property Licencia() As String
        Get
            Return mlicencia
        End Get
        Set(ByVal value As String)
            mlicencia = value
        End Set
    End Property
    Dim mEstado As String
    Public Property Estado() As String
        Get
            Return mEstado
        End Get
        Set(ByVal value As String)
            mEstado = value
        End Set
    End Property

    Public Sub New()
        Reset()
    End Sub
    Public Sub Reset()
        mtitulo = ""
        mcapitulo = ""
        marticulo = 0
        mlicencia = ""
        mEstado = 0
    End Sub
End Class
